home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 35 / Amiga Format AFCD35 (Issue 119, Jan 1999).iso / -in_the_mag- / reader_requests / fredobbutils / bbsrc / analog_logo.s < prev    next >
Text File  |  1998-11-06  |  5KB  |  255 lines

  1. * Analog BootIntro
  2. * Resourced by Frédo '97
  3.  
  4. lb_0000
  5.     dc.b    'dos',0
  6.     dc.l    0,$370
  7. start:
  8.     move.l    4.w,a6
  9.  
  10.     movem.l    d1-d7/a1-a5,-(a7)
  11.     jsr    -$0084(a6)
  12.     jsr    -$0078(a6)
  13.     lea    $00dff056,a5
  14.     lea    $0003fffc,a0
  15.     moveq    #-$01,d7
  16. lb_0026    clr.l    (a0)+
  17.     dbf    d7,lb_0026
  18.     lea    (a0),a2
  19.     lea    lb_026e(pc),a3
  20.     move    #$0080,$000a(a5)
  21.     move.l    d7,-$0012(a5)
  22.     move.l    #$ffff8000,$001c(a5)
  23.     moveq    #$06,d0
  24.     move    d0,-$0006(a5)
  25.     move    d0,-$000e(a5)
  26.     move    d0,-$0002(a5)
  27.     lea    lb_03d0(pc),a0
  28.     move.l    a0,$002e(a5)
  29.     clr    $0034(a5)
  30.     move    #$87c0,$0040(a5)
  31.     movem    (a3),d0-d7
  32.     lea    lb_027d(pc),a0
  33. lb_006c    move.b    (a0)+,d1
  34.     bne    lb_0104
  35.     addq    #2,a0
  36.     move.l    #$09f0000a,-$0016(a5)
  37.     moveq    #-$02,d0
  38.     move    d0,-$0004(a5)
  39.     move    d0,(a5)
  40.     move.l    d1,$000e(a5)
  41.     move    #$8000,$0002(a5)
  42.     lea    $0005420c,a2
  43.     lea    $3bfc(a2),a3
  44.     move    #$0100,d4
  45.     move.b    #$a2,(a0)
  46. lb_00a0    btst    #$06,$00bfe001
  47.     beq.b    lb_00e4
  48. lb_00aa    move.l    -$0052(a5),d2
  49.     lsr.l    #8,d2
  50.     andi    #$01ff,d2
  51.     cmpi    #$000a,d2
  52.     bne.b    lb_00aa
  53.     lea    $012a(a5),a4
  54.     move.l    #$0fff0000,(a4)+
  55.     move.l    #$0ccc0000,(a4)
  56.     movem.l    a2/a3,$008a(a5)
  57.     adda    #$0182,a2
  58.     adda    #$0102,a3
  59. lb_00d8    cmpi.b    #$0b,-$0050(a5)
  60.     bne.b    lb_00d8
  61.     dbf    d4,lb_00a0
  62. lb_00e4    clr.b    (a0)
  63.     movem.l    (a7)+,d1-d7/a1-a5
  64.     lea    lb_03f4(pc),a1
  65.     jsr    -$0060(a6)
  66.     move.l    d0,a0
  67.     move.l    $0016(a0),a0
  68.     jsr    -$007e(a6)
  69.     jsr    -$008a(a6)
  70.     moveq    #$00,d0
  71.     rts    
  72. lb_0104    add    d1,-$00d0(a3)
  73.     move.b    (a0)+,-$00cb(a3)
  74. lb_010c    move.b    (a0)+,d7
  75.     beq    lb_006c
  76.     bpl.b    lb_0118
  77.     move.b    (a0)+,d0
  78.     move.b    (a0)+,d1
  79. lb_0118    move.b    d7,(a2)
  80.     andi    #$001f,d7
  81. lb_011e    btst    #$06,(a2)
  82.     beq.b    lb_0130
  83.     move.b    (a0)+,d2
  84.     move.b    (a0)+,d3
  85.     bsr.b    lb_018a
  86.     btst    #$05,(a2)
  87.     beq.b    lb_0184
  88. lb_0130    move    d7,-(a7)
  89.     move.b    (a0)+,d2
  90.     move.b    (a0)+,d3
  91.     move.b    (a0)+,d4
  92.     move.b    (a0)+,d5
  93.     move.b    (a0)+,d6
  94.     move.b    (a0)+,d7
  95.     lea    lb_0222(pc),a4
  96.     lea    (a3),a1
  97.     movem    d0-d7,(a3)
  98. lb_0148    movem    d0/d1,-(a7)
  99.     movem    (a3),d0-d7
  100.     mulu    (a4),d0
  101.     mulu    (a4)+,d1
  102.     mulu    (a4),d2
  103.     mulu    (a4)+,d3
  104.     mulu    -(a1),d4
  105.     mulu    (a1),d5
  106.     mulu    -(a1),d6
  107.     mulu    (a1),d7
  108.     add.l    d0,d2
  109.     add.l    d4,d2
  110.     add.l    d6,d2
  111.     swap    d2
  112.     add.l    d1,d3
  113.     add.l    d5,d3
  114.     add.l    d7,d3
  115.     swap    d3
  116.     movem    (a7)+,d0/d1
  117.     bsr.b    lb_018a
  118.     cmpa.l    a3,d4
  119.     bcs.b    lb_0148
  120.     movem    $000c(a3),d2/d3
  121.     bsr.b    lb_018a
  122.     move    (a7)+,d7
  123. lb_0184    dbf    d7,lb_011e
  124.     bra.b    lb_010c
  125. lb_018a    movem    d2/d3,-(a7)
  126.     cmp    d1,d3
  127.     bhi.b    lb_0198
  128.     beq.b    lb_0208
  129.     exg    d0,d2
  130.     exg    d1,d3
  131. lb_0198    move    d0,d5
  132.     move    d1,d6
  133.     addi    #$0000,d5
  134. lb_019e=*-2
  135.     addi    #$0000,d6
  136.     mulu    #$0080,d6
  137.     lsr    #3,d5
  138.     add    d5,d6
  139.     moveq    #$00,d4
  140.     sub    d1,d3
  141.     sub    d0,d2
  142.     bpl.b    lb_01b8
  143.     moveq    #$02,d4
  144.     neg    d2
  145. lb_01b8    move    d3,d1
  146.     add    d1,d1
  147.     cmp    d2,d1
  148.     dbhi    d3,lb_01c2
  149. lb_01c2    move    d3,d1
  150.     sub    d2,d1
  151.     bpl.b    lb_01cc
  152.     exg    d2,d3
  153.     addq    #1,d4
  154. lb_01cc    add    d2,d2
  155.     move    d2,d1
  156.     sub    d3,d2
  157.     addx    d4,d4
  158.     add    lb_019e(pc),d0
  159.     andi    #$000f,d0
  160.     ror    #4,d0
  161.     ori    #$0b4a,d0
  162.     bsr.b    lb_0210
  163.     move    d2,-$0004(a5)
  164.     sub    d3,d2
  165.     lsl    #6,d3
  166.     addq    #2,d3
  167.     move    d0,-$0016(a5)
  168.     move.b    lb_021a(pc,d4.l),-$0013(a5)
  169.     move    d6,-$000c(a5)
  170.     move    d6,(a5)
  171.     movem    d1/d2,$000c(a5)
  172.     move    d3,$0002(a5)
  173. lb_0208    movem    (a3),d2-d6
  174.     movem    (a7)+,d0/d1
  175. lb_0210    btst    #$0e,-$0054(a5)
  176.     bne.b    lb_0210
  177.     rts    
  178. lb_021a
  179.     dc.b    $03,$43,$13,$53,$0b,$4b,$17,$57
  180. lb_0222    dc.b    $db,$7d,$22,$a8,$ba,$a0,$3e,$35
  181.     dc.b    $9d,$37,$53,$3b,$83,$12,$62,$4e
  182.     dc.b    $6c,$00,$6c,$00,$57,$cf,$70,$e5
  183.     dc.b    $46,$4e,$71,$91,$37,$4c,$6e,$98
  184.     dc.b    $2a,$98,$68,$8b,$20,$00,$60,$00
  185.     dc.b    $17,$54,$55,$89,$10,$62,$49,$ba
  186.     dc.b    $0a,$fa,$3d,$27,$06,$e9,$30,$62
  187.     dc.b    $04,$00,$24,$00,$02,$0c,$18,$93
  188.     dc.b    $00,$dd,$0e,$b0,$00,$42,$06,$e9
  189.     dc.b    $00,$08,$01,$d3
  190. lb_026e
  191.     dc.b    $00,$a9,$00,$41,$00,$6e,$00,$61
  192.     dc.b    $00,$6c,$00,$6f,$00,$67
  193. lb_027c
  194.     dc.b    $00
  195. lb_027d    dc.b    $04,$03,$c7
  196. lb_0280
  197.     dc.b    $02,$e4,$53,$1b,$97,$1b,$e5,$e4
  198.     dc.b    $a6,$e4,$99,$bf,$4a,$bf,$3d,$e4
  199.     dc.b    $02,$e4,$c2,$57,$95,$72,$44,$8a
  200.     dc.b    $95,$57,$95,$00,$e8,$1f,$e1,$04
  201.     dc.b    $c8,$04,$58,$04,$49,$04,$49,$02
  202.     dc.b    $3a,$39,$3a,$3b,$43,$3b,$43,$3b
  203.     dc.b    $4b,$21,$44,$40,$51,$38,$64,$38
  204.     dc.b    $76,$38,$9b,$3e,$9b,$63,$41,$9b
  205.     dc.b    $c8,$67,$c8,$60,$67,$73,$67,$4d
  206.     dc.b    $3b,$52,$3b,$70,$41,$3b,$c8,$04
  207.     dc.b    $c8,$00
  208. lb_02d2
  209.     dc.b    $9e,$21,$e0,$41,$63,$0d,$63,$0d
  210.     dc.b    $42,$2b,$35,$53,$35,$20,$76,$35
  211.     dc.b    $94,$42,$94,$5d,$61,$94,$a5,$94
  212.     dc.b    $ae,$94,$b8,$99,$c6,$64,$c6,$62
  213.     dc.b    $bf,$62,$bf,$62,$b4,$24,$5e,$bd
  214.     dc.b    $51,$ca,$39,$ca,$08,$ca,$02,$ae
  215.     dc.b    $02,$9a,$04,$72,$32,$6a,$62,$6a
  216.     dc.b    $62,$5a,$62,$4d,$53,$4d,$44,$4d
  217.     dc.b    $41,$5a,$41,$63,$a2,$62,$84,$62
  218.     dc.b    $8f,$62,$9c,$59,$a5,$4a,$b4,$34
  219.     dc.b    $a3,$39,$93,$3b,$86,$53,$84,$62
  220.     dc.b    $84,$00,$9c,$03,$c3,$02,$1b,$36
  221.     dc.b    $1b,$36,$e4,$02,$e4,$02,$1b,$00
  222.     dc.b    $39,$21,$a3,$53,$35,$83,$35,$a6
  223.     dc.b    $4b,$a6,$7b,$a6
  224. lb_0346
  225.     dc.b    $b8,$76,$ca,$53,$ca,$23,$ca,$02
  226.     dc.b    $ab,$02,$7d,$04,$58,$16,$35,$53
  227.     dc.b    $35,$a3,$53,$54,$69,$54,$6d,$6a
  228.     dc.b    $6d,$7d,$6d,$8f,$69,$a9,$53,$a9
  229.     dc.b    $44,$a9,$39,$9a,$39,$7b,$39,$63
  230.     dc.b    $41,$54,$53,$54,$00,$a9,$3b,$c2
  231.     dc.b    $6f,$33,$72,$1f,$a6,$1f,$a6,$9c
  232.     dc.b    $21,$a6,$d7,$74,$e4,$51,$e2,$39
  233.     dc.b    $e2,$0b,$db,$0b,$b2,$60,$3f,$b2
  234.     dc.b    $3f,$ba,$44,$c1,$53,$c3,$24,$72
  235.     dc.b    $c3,$6f,$ab,$6f,$91,$67,$a0,$53
  236.     dc.b    $a7,$41,$a7,$1c,$a7,$02,$88,$02
  237.     dc.b    $61,$02,$39,$1c
  238. lb_03aa
  239.     dc.b    $1b,$41,$1b,$5a,$1b,$67,$21,$6f
  240.     dc.b    $33,$a3,$55,$39,$67,$39,$6f,$4d
  241.     dc.b    $6f,$5f,$6f,$77,$69,$86,$55,$86
  242.     dc.b    $46,$86,$3b,$79,$3b,$61,$3b,$40
  243.     dc.b    $4c,$39,$55,$39,$00,$00
  244. lb_03d0
  245.     dc.b    $01,$00
  246.     dc.b    $82,$00,$01,$02,$00,$00,$01,$08
  247.     dc.b    $00,$28,$01,$0a,$00,$28,$00,$8e
  248.     dc.b    $1a,$71,$00,$90,$3c,$d1,$00,$92
  249.     dc.b    $00,$30,$00,$94,$00,$d8,$ff,$ff
  250.     dc.b    $ff,$fe
  251. lb_03f4
  252.     dc.b    $64,$6f,$73,$2e,$6c,$69,$62,$72
  253.     dc.b    $61,$72,$79,$00
  254. lb_0400
  255.